Parse Name

Dim parser As New NameParserLogic() 'Trial Mode

Dim parserLicensed As New NameParserLogic("place user name here", "place license key here") 'License Mode

Dim parts As NameParts = parser.ParseName("Mr. John Albert Jones Jr.", NameOrder.AutoDetect)

Console.WriteLine(parts.Honorific)

Console.WriteLine(parts.FirstName)

Console.WriteLine(parts.MiddleName)

Console.WriteLine(parts.LastName)

Console.WriteLine(parts.Suffix)

Console.WriteLine(parts.IsMale)

Match Name

Dim parser As New NameParserLogic() 'Trial Mode

Dim parserLicensed As New NameParserLogic("place user name here", "place license key here") 'License Mode

Dim parts1 As NameParts = New NameParts With {.FirstName = "Mike"}

Dim parts2 As NameParts = New NameParts With {.FirstName = "Michael"}

'This will be true since Michael is a root match for Mike

Console.WriteLine(parser.NameMatch(parts1,parts2))